home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The PC-SIG Library 10
/
The PC-Sig Library - Shareware for the IBM PC and Compatibles (PC-SIG)(Tenth Edition Disks 1-2804)(1991).iso
/
PC_SIGCD
/
26
/
3
/
DISK2635.ZIP
/
DISK.ZIP
/
DISK.INC
< prev
next >
Wrap
Text File
|
1990-05-15
|
693b
|
16 lines
' Include file for routines in DISK.OBJ
$link "disk.obj" ' external object file.
declare function backup%(string,string) ' Copy Files
declare function curdrv%() ' Get current drive
declare function exst%(string) ' check for file attributes
declare function find1$(string,integer) ' Find First
declare function find2$() ' Find Next
declare function freespace&(string) ' return free space on a drive
declare function iam$() ' return the current program pathname
declare function isdir$() ' get the current directory
declare function size&(string) ' return the size of a file (bytes)
declare sub chdrv(string) ' Change Drive
declare sub flush() ' Flush File Buffers